-- Written for Daggerfall Unity by Harbinger451
Quest: PROST003
DisplayName: Pay for a Debauch
-- Message panels
QRC:

QuestorOffer:  [1000]
<ce>                 Want to get down and dirty, sweet-cheeks?
                                     <--->
<ce>                Want to do it like a pair of wolves in heat?
                                     <--->
<ce>                  Do you want to use me as a plaything?
                                     <--->
<ce>                  I bet you'd like to get wild with me?
                                     <--->
<ce>                   Hey baby! Do you want to get laid?
<ce>                  You can trust me, I'm a professional.

RefuseQuest:  [1001]
<ce>                      Ah well, I can always dream.
                                     <--->
<ce>                    %oth! Can't blame me for asking.
                                     <--->
<ce>                       You disappoint me, %ra.
                                     <--->
<ce>         Obviously, you don't recognize a good thing when you see it.
                                     <--->
<ce>             Move along, %ra! I need to find another mark quick.

AcceptQuest:  [1002]
<ce>                       First, we must discuss the
<ce>                             wages of sin.
                                     <--->
<ce>                     I must broach the subject of
<ce>                    my remuneration with you first.
                                     <--->
<ce>                      Before going any further, let
<ce>                us debate the costs of carnal knowledge.
                                     <--->
<ce>                Now comes the little matter of my payment.
<ce>                 We must agree on the price of ecstasy.

QuestFail:  [1003]
<ce>                       I ain't no charity, honey.
<ce>                         Hate to turn you away!
                                     <--->
<ce>                       No money, no fun, sweetie.
<ce>                             Such a shame!
                                     <--->
<ce>                       Sorry, darling. Next time,
<ce>                     be sure to have plenty of gold.
                                     <--->
<ce>                        %oth! Time is money, %ra.
<ce>             I don't have the time and you don't have the money!

QuestComplete:  [1004]
<ce>                          Thanks for the gold!
<ce>               It was a pleasure doing business with you, %pcf. 
<ce>                         Come back for more, anytime.
                                     <--->
<ce>                    That certainly was enjoyable, %pcf.
<ce>                 You and your gold are always welcome here.
                                     <--->
<ce>                   Well, that seemed to get a load off.
<ce>                    I'm always available for you, %pcf...
<ce>                             and your gold!
                                     <--->
<ce>                      %oth! That was fantastic, %pcf.
<ce>                   You were so good, I'm almost tempted
<ce>                  to give you your money back... almost.

RumorsPostsuccess:  [1007]
Some adventurous %ra has been breaking all the prostitutes hearts. _qgiver_ is in a swoon over it.
<--->
A new client has left _qgiver_ breathless and in a tizzy of love and lust. %g1 doesn't know where to turn.
<--->
I don't know what the Empire's been putting in the oats lately, but the prostitutes are doing a roaring trade.

QuestorPostsuccess:  [1008]
What ho, %pcf. You seemed to enjoy our little assignation earlier. As did I.
<--->
I can't stop telling people how good you were, %pcf. I have to admit, I think I enjoyed it even more than you.
<--->
Hey, %pcf, I've spread the word among the other prostitutes, Now they all want a piece.

QuestLogEntry:  [1010]
%qdt
_qgiver_ in __qgiver_
of ___qgiver_ wants 300 gold for a debauch.

Message:  1011
%qdt:
I had a truly delightful debauch with _qgiver_ in __qgiver_ 
of ___qgiver_. It only cost me 300 gold pieces.
Alas, a creeping sensation makes me think I have contracted a pox.

Message:  1012
<ce>                 I'll broaden your mind for a miserly 300.
                                     <--->
<ce>               A very special service, only 300 gold pieces.
                                     <--->
<ce>                 A delicious debauch for just 300 gold?
                                     <--->
<ce>             I'll make your day, and it's a steal at 300 coins?

Message:  1013
<ce>                    Oh this is going to be good, %pcf. 
<ce>                          Ready when you are.
                                     <--->
<ce>                       That's the spirit, %pcf!
<ce>                   I'm all a tingle with anticipation.
                                     <--->
<ce>                     I'm ready and willing, %pcf.
<ce>                    So don't delay your advances!
                                     <--->
<ce>                      Alright, %pcf, lets do this.
<ce>                     Give me everything you've got!

Message:  1014
<ce>                You of all people, %pcf. A penny pincher?
<ce>                        Oh well, maybe next time.
                                     <--->
<ce>                             Really, %pcf?
<ce>                   You don't look like the stingy type.
                                     <--->
<ce>                     So you don't think I'm worth it?
<ce>                    I'm very disappointed in you, %pcf.
                                     <--->
<ce>                  You really gonna waste my time like that!
<ce>            If you're not gonna pay for my attention, you best be off.

Message:  1015
<ce>                     Very well, now that your money is
<ce>                    safe in my purse, lets get down to
<ce>                        some serious debauchery.
<ce>                                 ...
<ce>                       Oh, yes! Take me! Take me!
<ce>                 %oth! You really know what you're doing.
<ce>                                 ...
<ce>                       Faster! Harder! Yes! Yes!
<ce>                                 ...
<ce>                       Don't stop! I'm melting!
<ce>                                 ...
<ce>                        Yes! Yes! YES! Aaaah!
<ce>                                 ...
<ce>                   By all the gods and daedra, %pcf,
<ce>                you'd make even Sanguine himself blush!
                                    <--->
<ce>                   That's what I like to hear, %pcf.
<ce>                        Now you've paid my fee, 
<ce>            the delightful debauchery need wait no longer!
<ce>                                 ...
<ce>                      Mmm, yes! Take me! Use me!
<ce>                  %oth! You really know your stuff.
<ce>                                 ...
<ce>                       Oh my! Oh my! Yes! YES!
<ce>                                 ...
<ce>                       I'm melting! I'm melting!
<ce>                                 ...
<ce>                      Yes! Yes! YES! Oh-eeeejzzk!
<ce>                                 ...
<ce>                     By Sanguine that was amazing.
<ce>              It'll be a week before I can walk straight!

Message:  1016
%qdt:
I had a truly delightful debauch with _qgiver_ in __qgiver_ 
of ___qgiver_. It only cost me 300 gold pieces.

QBN:

Person _qgiver_ group Questor

Clock _paywindow_ 05:00

-- Quest start-up:
    start timer _paywindow_
    prompt 1012 yes _pcpay_ no _pctight_
    log 1010 step 0 

_pcpay_ task:
    say 1013
    pay 300 money do _pcpaid_ otherwise do _pcpoor_

_pctight_ task:
    say 1014
    change repute with _qgiver_ by -2
    remove log step 0
    end quest

_paywindow_ task:
    remove log step 0
    end quest

_pcpaid_ task:
    clear _pcpay_
    pick one of _pcinfect1in3_ _pcclear_ _pcclear_

_pcinfect1in3_ task:
    pick one of _pcinfect1in9_ _pcclear_ _pcclear_

_pcinfect1in9_ task:
    pick one of _pcinfect1in27_ _pcclear_ _pcclear_

_pcinfect1in27_ task:
    pick one of _pox_ _pox_ _leprosy_ _plague_

_pox_ task:
    say 1015
    train pc Streetwise
    give pc nothing
    remove log step 0
    log 1011 step 1
    make pc ill with Witches'_Pox
    end quest

_leprosy_ task:
    say 1015
    train pc Streetwise
    give pc nothing
    remove log step 0
    log 1011 step 1
    make pc ill with Leprosy
    end quest

_plague_ task:
    say 1015
    train pc Streetwise
    give pc nothing
    remove log step 0
    log 1011 step 1
    make pc ill with Plague
    end quest

_pcclear_ task:
    say 1015
    train pc Streetwise
    give pc nothing
    remove log step 0
    log 1016 step 1
    end quest

_pcpoor_ task:
    say 1003
    remove log step 0
    end quest

